home *** CD-ROM | disk | FTP | other *** search
/ Champak 128 / Vol 128 (Damaged).iso / games / breakdow.swf / scripts / frame_8 / DoAction.as
Encoding:
Text File  |  2011-03-26  |  980 b   |  46 lines
  1. ch = 1;
  2. while(Number(ch) < 16)
  3. {
  4.    if(eval("col" add ch) == 1)
  5.    {
  6.       a = eval("ymax" add ch);
  7.       while(0 < Number(a))
  8.       {
  9.          set("var" add ch add "_" add a add "_gone",1);
  10.          set("var" add ch add "_" add a add "_color","");
  11.          a -= 1;
  12.       }
  13.       t = eval("ymax" add ch) + 1;
  14.       while(25 >= Number(t))
  15.       {
  16.          set("var" add ch add "_" add t add "_gone",0);
  17.          tellTarget("var" add ch add "_" add t)
  18.          {
  19.             set("/:var" add eval("/:ch") add "_" add eval("/:t") add "_color",_currentframe);
  20.          }
  21.          t = Number(t) + 1;
  22.       }
  23.       set("col" add ch,0);
  24.       ch = Number(ch) + 1;
  25.       if(eval("col" add ch) != 1)
  26.       {
  27.          ch = 16;
  28.       }
  29.    }
  30.    else
  31.    {
  32.       ch = Number(ch) + 1;
  33.    }
  34. }
  35. ch = 1;
  36. while(Number(ch) < 16)
  37. {
  38.    set("newmax" add ch,eval("ymax" add ch));
  39.    ch = Number(ch) + 1;
  40. }
  41. if(0 >= Number(score))
  42. {
  43.    gotoAndStop(10);
  44. }
  45. stop();
  46.